perm filename TRIANG.TEX[TEX,DEK] blob
sn#692013 filedate 1982-12-22 generic text, type T, neo UTF8
\input amfonts
\setbox1=\hbox{I}
\def\tr#1pt{\varunit #1pt \setbox0=\vbox{
\parshape 11 0vu0vu -1vu2vu -2vu4vu -3vu6vu -4vu8vu
-5vu10vu -6vu12vu -7vu14vu -8vu16vu -9vu18vu -10vu20vu
\ifdim 1vu<20pt \frenchspace \rightskip=-1wd1 plus -1pt minus -1pt
\leftskip=0pt plus 1pt minus 1pt \else \rightskip=-1wd1 \fi
\parfillskip=0pt \noindent
I turn, in the following treatises, to various uses of those
triangles whose generator is unity. But I leave out many more
than I include; it is extraordinary how fertile in properties
this triangle is. Everyone can try his hand.}
\setbox0=\ctrline{\hbox to 1wd1{\box0\hss}}}
\def\pub{\box0\the\varunit\vfill\eject}
\scrollmode
\hbadness-1
\tolerance9999